(flyspell-mode-line-string): Fix custom type.

diff --git a/lisp/textmodes/flyspell.el b/lisp/textmodes/flyspell.el
index 21d1b8b9ac5d33db1eb40bff78de0537ddb3cba2..eaebab0592b084ae0c7063ba96c0e2b7f9c5e7d5 100644 (file)
--- a/lisp/textmodes/flyspell.el
+++ b/lisp/textmodes/flyspell.el
@@ -209,7 +209,7 @@ http://strw.leidenuniv.nl/~dominik/Tools"
   "*String displayed on the modeline when flyspell is active.
 Set this to nil if you don't want a modeline indicator."
   :group 'flyspell
-  :type 'string)
+  :type '(choice string (const :tag "None" nil)))
 
 (defcustom flyspell-large-region 1000
   "*The threshold that determines if a region is small.